home *** CD-ROM | disk | FTP | other *** search
/ Shareware Overload Trio 2 / Shareware Overload Trio Volume 2 (Chestnut CD-ROM).ISO / dir40 / otto14.zip / GETSTOCK < prev    next >
Text File  |  1992-02-07  |  459b  |  25 lines
  1. ;gets a couple of stock quotes
  2.  
  3. w c "!"
  4. "go BASICQUOTE|"
  5. w c "Issue: "
  6. "Φ86 "          ;initiate capture (Autosig unique, change for your program)
  7. w c "name: "
  8. "stocks|"       ;store data is "stocks" file
  9. w 1
  10. "FMAGX|"        ;Fidelity Magellean
  11. w c "Issue: "
  12. "MSFT|"         ;Microsoft
  13. w c "Issue: "
  14. "AAPL|"         ;Apple Computer
  15. w c "Issue: "
  16. "IBM|"          ;guess
  17. w c "Issue: "
  18. "Φ86 "          ;end capture
  19. w .5
  20. "|"
  21. w c "!"
  22. end
  23.  
  24.  
  25.